home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / games / strategy / madgic-corewar-4.0.lzh / 1989 / Vamp.s < prev    next >
Text File  |  1992-03-10  |  937b  |  21 lines
  1. ;Warrior VAMP
  2. ;by Stefan Roettger, D-8525 Uttenreuth
  3. ;
  4. ;
  5. start    spl  search             ;split program execution to main task
  6.          mov #0        start     ;initialize pointer to buffer
  7. cbuf     mov #1       <start     ;build a buffer containing #1
  8.          djn  cbuf     c         ;is the buffer big enough?
  9. c        dat #41                 ;counter and end for buffer task
  10. search   mov  bomb1   @p         ;bomb core with bomb1
  11.          add #18       p         ;skip 18
  12.          mov  bomb2   @p         ;bomb core with bomb2
  13.          add #23       p         ;skip 23
  14.          djn  search  @p         ;run into buffer?
  15.          mov #1       @p         ;repair damaged buffer
  16.          add #820      p         ;do not bomb own program
  17.          jmp  search             ;continue bombing
  18. bomb1    spl  0                  ;spl bomb to slow down opponent
  19. bomb2    jmp  -18                ;jmp bomb to confuse and kill
  20. p        dat #2048
  21.